home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / workst1a / printw2.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-10-03  |  1.3 KB  |  46 lines
  1. VERSION 5.00
  2. Begin VB.Form Form2 
  3.    Caption         =   "PRINT"
  4.    ClientHeight    =   3195
  5.    ClientLeft      =   60
  6.    ClientTop       =   345
  7.    ClientWidth     =   4680
  8.    Icon            =   "printW2.frx":0000
  9.    LinkTopic       =   "Form2"
  10.    ScaleHeight     =   8595
  11.    ScaleWidth      =   11880
  12.    StartUpPosition =   3  'Windows Default
  13.    WindowState     =   2  'Maximized
  14.    Begin VB.Timer Timer1 
  15.       Interval        =   3000
  16.       Left            =   2040
  17.       Top             =   1440
  18.    End
  19.    Begin VB.TextBox Text1 
  20.       BeginProperty Font 
  21.          Name            =   "MS Sans Serif"
  22.          Size            =   13.5
  23.          Charset         =   0
  24.          Weight          =   400
  25.          Underline       =   0   'False
  26.          Italic          =   0   'False
  27.          Strikethrough   =   0   'False
  28.       EndProperty
  29.       Height          =   8535
  30.       Left            =   0
  31.       MultiLine       =   -1  'True
  32.       TabIndex        =   0
  33.       Top             =   0
  34.       Width           =   11850
  35.    End
  36. Attribute VB_Name = "Form2"
  37. Attribute VB_GlobalNameSpace = False
  38. Attribute VB_Creatable = False
  39. Attribute VB_PredeclaredId = True
  40. Attribute VB_Exposed = False
  41. Private Sub Timer1_Timer()
  42. Printer.Print Text1.Text
  43. Timer1.Enabled = False
  44. Unload Me
  45. End Sub
  46.